load(key).

discretize(entropy).
use_package(hypspc).
minimal_cases(2).
accuracy(0.80).
random_test_set(0.1).

classes(  [cp,im,imS,imL,imU,om,omL,pp]).
predict(class(+example,-cl)).



rmode(1: sequence_name(+Example, #)).

rmode(1: mcg(+Example, #)).
rmode(1: mcg(+Example, -Number)).
rmode(1: gvh(+Example, #)).
rmode(1: gvh(+Example, -Number)).
rmode(1: lip(+Example, #)).
rmode(1: lip(+Example, -Number)).
rmode(1: chg(+Example, #)).
rmode(1: chg(+Example, -Number)).
rmode(1: aac(+Example, #)).
rmode(1: aac(+Example, -Number)).
rmode(1: alm1(+Example, #)).
rmode(1: alm1(+Example, -Number)).
rmode(1: alm2(+Example, #)).
rmode(1: alm2(+Example, -Number)).





typed_language(yes).
type(sequence_name(example, sequence_name)).
type(mcg(example, number)).
type(gvh(example, number)).
type(lip(example, number)).
type(chg(example, number)).
type(aac(example, number)).
type(alm1(example, number)).
type(alm2(example, number)).

type(number =< number).
type(number >= number).



auto_lookahead(mcg(Example,Number),[Number]).
auto_lookahead(gvh(Example,Number),[Number]).
auto_lookahead(aac(Example,Number),[Number]).
auto_lookahead(alm1(Example,Number),[Number]).
auto_lookahead(alm2(Example,Number),[Number]).




discretize(entropy).

discretization(bounds(6)).

to_be_discretized(mcg(Example,Number),[Number]).
rmode(1: #(C:threshold(mcg(_, Number), [Number], C), +Number >= C)).
rmode(1: #(C:threshold(mcg(_, Number), [Number], C),+Number =< C)).




to_be_discretized(gvh(Example,Number),[Number]).
rmode(1: #(C:threshold(gvh(_, Number), [Number], C), +Number >= C)).
rmode(1: #(C:threshold(gvh(_, Number), [Number], C),+Number =< C)).



to_be_discretized(lip(Example,Number),[Number]).
rmode(1: #(C:threshold(lip(_, Number), [Number], C), +Number >= C)).
rmode(1: #(C:threshold(lip(_, Number), [Number], C),+Number =< C)).



to_be_discretized(chg(Example,Number),[Number]).
rmode(1: #(C:threshold(chg(_, Number), [Number], C), +Number >= C)).
rmode(1: #(C:threshold(chg(_, Number), [Number], C),+Number =< C)).



to_be_discretized(aac(Example,Number),[Number]).
rmode(1: #(C:threshold(aac(_, Number), [Number], C), +Number >= C)).
rmode(1: #(C:threshold(aac(_, Number), [Number], C),+Number =< C)).



to_be_discretized(alm1(Example,Number),[Number]).
rmode(1: #(C:threshold(alm1(_, Number), [Number], C), +Number >= C)).
rmode(1: #(C:threshold(alm1(_, Number), [Number], C),+Number =< C)).



to_be_discretized(alm2(Example,Number),[Number]).
rmode(1: #(C:threshold(alm2(_, Number), [Number], C), +Number >= C)).
rmode(1: #(C:threshold(alm2(_, Number), [Number], C),+Number =< C)).





















